home *** CD-ROM | disk | FTP | other *** search
/ IRIX 6.2 Development Libraries / SGI IRIX 6.2 Development Libraries.iso / dist / complib.idb / usr / share / catman / p_man / cat3 / complib / ztrexc.z / ztrexc
Text File  |  1996-03-14  |  3KB  |  133 lines
  1.  
  2.  
  3.  
  4. ZZZZTTTTRRRREEEEXXXXCCCC((((3333FFFF))))                                                          ZZZZTTTTRRRREEEEXXXXCCCC((((3333FFFF))))
  5.  
  6.  
  7.  
  8. NNNNAAAAMMMMEEEE
  9.      ZTREXC - reorder the Schur factorization of a complex matrix A =
  10.      Q*T*Q**H, so that the diagonal element of T with row index IFST is moved
  11.      to row ILST
  12.  
  13. SSSSYYYYNNNNOOOOPPPPSSSSIIIISSSS
  14.      SUBROUTINE ZTREXC( COMPQ, N, T, LDT, Q, LDQ, IFST, ILST, INFO )
  15.  
  16.          CHARACTER      COMPQ
  17.  
  18.          INTEGER        IFST, ILST, INFO, LDQ, LDT, N
  19.  
  20.          COMPLEX*16     Q( LDQ, * ), T( LDT, * )
  21.  
  22. PPPPUUUURRRRPPPPOOOOSSSSEEEE
  23.      ZTREXC reorders the Schur factorization of a complex matrix A = Q*T*Q**H,
  24.      so that the diagonal element of T with row index IFST is moved to row
  25.      ILST.
  26.  
  27.      The Schur form T is reordered by a unitary similarity transformation
  28.      Z**H*T*Z, and optionally the matrix Q of Schur vectors is updated by
  29.      postmultplying it with Z.
  30.  
  31.  
  32. AAAARRRRGGGGUUUUMMMMEEEENNNNTTTTSSSS
  33.      COMPQ   (input) CHARACTER*1
  34.              = 'V':  update the matrix Q of Schur vectors;
  35.              = 'N':  do not update Q.
  36.  
  37.      N       (input) INTEGER
  38.              The order of the matrix T. N >= 0.
  39.  
  40.      T       (input/output) COMPLEX*16 array, dimension (LDT,N)
  41.              On entry, the upper triangular matrix T.  On exit, the reordered
  42.              upper triangular matrix.
  43.  
  44.      LDT     (input) INTEGER
  45.              The leading dimension of the array T. LDT >= max(1,N).
  46.  
  47.      Q       (input/output) COMPLEX*16 array, dimension (LDQ,N)
  48.              On entry, if COMPQ = 'V', the matrix Q of Schur vectors.  On
  49.              exit, if COMPQ = 'V', Q has been postmultiplied by the unitary
  50.              transformation matrix Z which reorders T.  If COMPQ = 'N', Q is
  51.              not referenced.
  52.  
  53.      LDQ     (input) INTEGER
  54.              The leading dimension of the array Q.  LDQ >= max(1,N).
  55.  
  56.      IFST    (input) INTEGER
  57.              ILST    (input) INTEGER Specify the reordering of the diagonal
  58.              elements of T:  The element with row index IFST is moved to row
  59.              ILST by a sequence of transpositions between adjacent elements.
  60.  
  61.  
  62.  
  63.                                                                         PPPPaaaaggggeeee 1111
  64.  
  65.  
  66.  
  67.  
  68.  
  69.  
  70. ZZZZTTTTRRRREEEEXXXXCCCC((((3333FFFF))))                                                          ZZZZTTTTRRRREEEEXXXXCCCC((((3333FFFF))))
  71.  
  72.  
  73.  
  74.              1 <= IFST <= N; 1 <= ILST <= N.
  75.  
  76.      INFO    (output) INTEGER
  77.              = 0:  successful exit
  78.              < 0:  if INFO = -i, the i-th argument had an illegal value
  79.  
  80.  
  81.  
  82.  
  83.  
  84.  
  85.  
  86.  
  87.  
  88.  
  89.  
  90.  
  91.  
  92.  
  93.  
  94.  
  95.  
  96.  
  97.  
  98.  
  99.  
  100.  
  101.  
  102.  
  103.  
  104.  
  105.  
  106.  
  107.  
  108.  
  109.  
  110.  
  111.  
  112.  
  113.  
  114.  
  115.  
  116.  
  117.  
  118.  
  119.  
  120.  
  121.  
  122.  
  123.  
  124.  
  125.  
  126.  
  127.  
  128.  
  129.                                                                         PPPPaaaaggggeeee 2222
  130.  
  131.  
  132.  
  133.